Top 10k strings from Olympics (1984)(CRL Group)(Part 1 of 2).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
8 ;"TIME= ";T$( 5 P$="00.00" 5 ;"IN ";T$( 4 P$="00.00": 4 ;"TIME= 1:";T$( 4 ;"FOR ";D$(10 4 ;"FOR ";C$(10 4 ;"FOR ";B$(10 4 ;"FOR ";A$(10 4 ;"ENERGY:";AC 4 );" SECONDS!" 4 "PLEASE ENTER NAME:" 3 XPOS=XPOS+SPEED: 3 EVENTCHECK=2 3 ;D$(EV);"WINS!" 3 ;B$(EV);"WINS!" 3 ;A$(EV);"WINS!" 3 ;"THE LEAD!": 2 K;"ROUND:";M 2 EVENTCHECK=1 2 ;D$(EV);"FOR" 2 ;C$(EV);"WINS" 2 ;C$(EV);"WINS!" 2 ;B$(EV);"FOR" 2 ;"PRESS 'SPACE' TO THROW" 2 );"FOR "'D$(10 2 );"FOR "'C$(10 2 );"FOR "'B$(10 2 );"FOR "'A$(10 2 THE OLYMPIC GAMES 1 YPOS=YPOS-SPEED*.75 1 YPOS=YPOS+SPEED/2 1 YPOS=YPOS+SPEED 1 XPOS>POS1+85 1 XPOS>POS1+40 1 XPOS>POS1+22 1 XPOS=XPOS+SPEED 1 W1=(XPOS/3 1 W$="MJB10668" 1 STOP THE TAPE 1 PREPARED FOR 1 P$="0.00": 1 OLYMPICS 1 NAT.ANTHEM 1 N$="PLEASE ENTER A 3 LETTER VERSION OF " 1 N$=" COUNTRY (OR CLUB)" 1 M/CODE 1 L$="00.00": 1 L$="0.00": 1 K;"THE BEST SO FAR:";L$( 1 K;"Next to throw:" 1 K;"BEST SO FAR: ";L$( 1 F,GRAPHICS: 1 D$(EV);"WINS": 1 CC,C1;" "; 1 C1,C2;" ": 1 C$(EV);"WINS": 1 B$(EV);"WINS": 1 AA,A1;" "; 1 A1,A2;" ": 1 A$(J),B$(J),C$(J),D$(J),E$(J) 1 A$(EV);"WINS": 1 ;D$(EV);"WINS" 1 ;C$(EV);"FOR": 1 ;B$(EV);"WINS" 1 ;A$(EV);"WINS" 1 ;A$(EV);"FOR": 1 ;"YELLOW": 1 ;"THE JAVELIN"; 1 ;"STOP THE TAPE" 1 ;"START THE TAPE" 1 ;"ROUND ";M 1 ;"PRESS 'SPACE' TO JUMP" 1 ;"PLEASE WAIT A MOMENT" 1 ;"PLEASE NOW LOAD SIDE 2 TO SEE SOME NON STADIUM EVENTS! 1 ;"PLEASE ENTER OTHER COUNTRY OR 1 ;"OLYMPICS" 1 ;"NO THROW!": 1 ;"NO THROW!" 1 ;"NO JUMP!" 1 ;"LONG JUMP" 1 ;"LANDED FLAT!": 1 ;"JAVELIN" 1 ;"GOLD MEDALS WON SO FAR" 1 ;"EVENT ";EV 1 ;"DISTANCE= ";P$( 1 ;":BEST SO FAR: ";L$( 1 ;" Please Leave the tape running. ": 1 ;" PLEASE STOP THE TAPE " 1 ;" OTHER EVENTS ": 1 ;" (MIN/SEC)" 1 ;" This program simulates an 1 ;" PRESS 'SPACE' TO ACCELERATE " 1 ;" You now have the opportunity to save the athletes names. Thismeans that any names you have entered can be loaded back, at alater date." 1 )="U.S.S.R." 1 )="U.S.A." 1 )="REST OF WORLD" 1 )="GREAT BRITAIN" 1 );"throw, you "'"must press 'SPACE', before he leaves the circle, otherwise it signifies a 'No Throw'." 1 );"i.e. the"'"athlete in blue in the inside lane. You start off with a 1 );" SECONDS" 1 )'"jump when it is his turn. You must judge the distance to the line and when ready, jump. If you cross the line this will signify a 'No Jump'." 1 (YOUR TEAM) 1 (N$);(D$(10 1 (N$);(C$(10 1 (N$);(B$(10 1 (N$);(A$(10 1 '''"END OF LIVE EVENTS." 1 ''"END OF EVENT " 1 '"END OF ALL EVENTS."''" 1 "We join the race at the half waystage with 400M to go. The 1 "Throughout the meeting, the 1 "These are the events in which you control the athlete:-": 1 "THESE ARE THE RESULTS" 1 "THE BEST SO FAR!:-" 1 "SWIMMING 200M(FREESTYLE)","400M (FREESTYLE)","(BOXING): FLYWEIGHT","FEATHER WEIGHT","LIGHTWEIGHT","MIDDLEWEIGHT","HEAVYWEIGHT","JUDO","BASKETBALL","HANDBALL","HOCKEY","VOLLEYBALL" 1 "S COE","J ROBINSON","V KIROV","J CRUZ","800M" 1 "R SLANEY","M WILKINS","N AVILOV","W SCHMIDT","DISCUS" 1 "PRESS 'ENTER' (C=COPY) "; 1 "P BROWN","M FRANKS","V MARKIN","D CLARK","400M" 1 "M HOLTOM","G FOSTER","U CHERVANYEV","T MUNKELT","110M HURDLES" 1 "J HERBERT","C LEWIS","J UUDMAE","F WASTENBERG","LONG JUMP" 1 "J ALDERSON","B OLDFIELD","E MIRONOV","E SARUL","SHOT PUT" 1 "GREAT BRITAIN","U.S.A.","U.S.S.R.","REST OF WORLD","***" 1 "GBR","USA","USR","R/W","***" 1 "FOR ";D$(10 1 "FOR ";C$(10 1 "FOR ";B$(10 1 "FOR ";A$(10 1 "Enter (1) to use the countries already listed, or (2) to enter your own: "; 1 "EVENTS CONTINUED" 1 "DO YOU WANT TO USE THE NAMES IN THE COMPUTER (Y/N)? ";I$ 1 "DO YOU WANT TO SAVE ATHLETES NAMES (Y/N)? "; 1 "DO YOU WANT TO PLAY AGAIN (Y/N)? "; 1 "DO YOU WANT TO LOAD PREVIOUSLY SAVED NAMES (Y/N)? "; 1 "D OTTLEY","B KENNEDY","D KULA","M O'ROUKE","JAVELIN" 1 "COMPETITORS:" 1 "C SHARP","C SMITH","A GRIGORYEV","E OBENG","200M" 1 "A WELLS","C LEWIS","A GRIGORYEV","D QUARRIE","100M" 1 "9)DISCUS" 1 "7)SHOT PUT" 1 "5)LONG JUMP" 1 "4TH";(N$); 1 "4)110M HURDLES" 1 "3RD";(N$); 1 "3)JAVELIN" 1 "2ND";(N$); 1 "1ST";(N$); 1 "1500M","5000M","10000M","4x100M","4x400M","50km WALK","400M HURDLES","3000M STEEPLECHASE","HIGH JUMP","POLE VAULT","TRIPLE JUMP","HAMMER","DECATHLON" 1 "100M","200M","JAVELIN","110M HURDLES","LONG JUMP","400M","SHOT PUT","800M","DISCUS" 1 " In all the field events,'your'athlete will compete first." 1 " In all the events, you help to'control' the athlete who is representing the first team 1 " We will now see the results of the other major events in thecompetition. The gold medals wonwill be added to the table. 1 " Using this method you must time your 'attack', perhaps by electing for a fast start or a sprint finish." 1 " To enable the athlete to 1 " This athlete THROWS first in each round of the competition." 1 " In this event, you must press'SPACE' to make the athlete 1 " In this event, you control the athlete representing"'A$(10 1 " In this event, to make the athlete representing"'A$(10 1 " In this event you again 1 throw the javelin, you must 1 representing ";A$(10 1 press 'SPACE' at the position where you wish him to throw it from. If you misjudge this 1 names already in the computer." 1 lanes all the way round." 1 following colours:-" 1 entered (GREAT BRITAIN if you use the computer teams)." 1 distance you may go over the throwing line. This results in a foul throw. This also occurs if the javelin lands 'flat'." 1 control the athlete representing"'A$(10 1 certain amount of energy. If this energy level is greater than 0, then pressing 'SPACE' accelerates the athlete. Each time you do this however, the energy level decreases by 1." 1 athletics meeting between GREAT BRITAIN, U.S.A, U.S.S.R. and REST OF THE WORLD, or between four countries or clubs of your choice. You will be asked to enter the athletes names in a moment for the nine events, or you can LOAD previously saved names from tape, or use the 1 athletes will keep to their 1 athletes participating in the track events will wear the 1 Watch and see if your country(or club) wins!" 1 VALUES, FOR USE ON SIDE TWO " 1 MATTHEW BRADSHAW 1984 " 1 MATTHEW BRADSHAW 1984 1 CLUB NAMES." 1 PLEASE MAKE A NOTE OF THESE